home *** CD-ROM | disk | FTP | other *** search
/ Clickx 75 / Clickx 75.iso / software / expressionweb / expressionwebv3 / ExpressionWeb_en.exe / Setup / WeConen.cab / xweb.doclib2.tem._X_CRTMD.FPR.en < prev    next >
Encoding:
Text File  |  2009-06-09  |  174 b   |  6 lines
  1. sub Expire_Document_in_6_months
  2.     expdt=date:expdt.settime(23,59,59)
  3.     doc.setexpirewarndays(7):expdt.AddMonth(6):expdt.AddDay(0):doc.meta.expiredate=expdt
  4. end sub
  5.  
  6.